home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / KEWL-BOT.ZIP / ctcps.ini < prev    next >
INI File  |  1997-04-09  |  2KB  |  26 lines
  1. [script]
  2. n0=#floodultracommand on
  3. n1=ctcp 1:*:halt
  4. n2=#floodultracommand end
  5. n3=#floodctcp on
  6. n4=ctcp !1:*:{
  7. n5=  if ((%ctcpchan == on) && ($chan != $null))  {
  8. n6=    if (($me isop $chan) && (%textlength != $null) && ($len($parms) > %textlength)) { mode $chan -o+b $nick $wildsite | kick $chan $nick Channel Long CTCP Flood! ü▀ΩtπFú≥≤╨ü | .timer 1 45 mode $chan -b $wildsite | goto end }
  9. n7=    inc %flood.ctcp. [ $+ [ $chan [ $+  [ $nick ] ] ] ] 1
  10. n8=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  11. n9=    if %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ] == 4 {
  12. n10=      if $me isop $chan { mode $chan -o+b $nick $wildsite | kick $chan $nick Channel CTCP Flood! ü▀ΩtπFú≥≤╨ü | .timer 1 45 mode $chan -b $wildsite }
  13. n11=      if (($me !isop $chan) && (%ctcppriv == off)) { echo 2 -a CTCP Channel Flood! ü $+ $nick $+ ü is being ignored. ü▀ΩtπFú≥≤╨ü | if $parm1 == dcc .ignore -ntu90 $wildsite 2 | else .ignore -tu90 $wildsite }
  14. n12=      unset %flood.ctcp. [ $+ [ $chan [ $+ [ $nick ] ] ] ]
  15. n13=    }
  16. n14=  :end
  17. n15=  }
  18. n16=  if %ctcppriv == on {
  19. n17=    inc %flood.ctcp. [ $+ [ $wildsite ] ] 1
  20. n18=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 1 .timer 1 15 unset %flood.ctcp. [ $+ [ $wildsite ] ]
  21. n19=    if %flood.ctcp. [ $+ [ $wildsite ] ] == 4 { notice $nick CTCP Flood! You are being ignored. ü▀ΩtπFú≥≤╨ü | unset %flood.ctcp. [ $+ [ $wildsite ] ] | if $parm1 == dcc .ignore -ntu90 $wildsite | else .ignore -tu90 $wildsite }
  22. n20=  }
  23. n21=  if $parm1 == version raw -q notice $nick :VERSION ü▀ΩtπFú≥≤╨ü 3.0
  24. n22=}
  25. n23=#floodctcp end
  26.